home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / MODULES / LESSON08 / ACT08B / L08B3.DIR / scripts_17.ls < prev    next >
Encoding:
Text File  |  2004-07-11  |  261 b   |  14 lines

  1. on cuePassed channel, num, name
  2.   go(the frame + 1)
  3. end
  4.  
  5. on exitFrame
  6.   global gSpeakerB
  7.   repeat with i = 1 to 3
  8.     set the member of sprite gSpeakerB to member("speaker," & i)
  9.     updateStage()
  10.     await(0.10000000000000001)
  11.   end repeat
  12.   go(the frame)
  13. end
  14.